home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Utilities / SysInspector / Install < prev    next >
Encoding:
Text File  |  1997-08-28  |  4.0 KB  |  173 lines
  1. ; SI Installer Script
  2. ; $Ver: v1.04 (28-Aug-97)
  3. ; Written by Phil Vedovatti
  4.  
  5. (set @default-dest "Sys:Utilities")
  6.  
  7. (set #bad-kick
  8.    (cat "\n\nSorry! You must have Workbench 3.0 or"
  9.         "\nhigher to to use this package."
  10.         "\n\nAborting Installation!"))
  11.  
  12.  
  13. (set #no-classact
  14.    (cat "\nHmmm!  You don't seem to have the ClassAct 2.0"
  15.         "\nGUI system installed.  You can obtain the"
  16.         "\nlatest ClassAct classes via ftp on the"
  17.         "\nInternet at: \n\n ftp.warped.com/pub/amiga/classact/"
  18.         "\n\nDo you wish to continue installation?"))
  19.  
  20. (set #Help-ContInstall
  21.    (cat "\nThis package requires ClassAct 2.0, which does not"
  22.         "\nappear to be installed on your system.  Select"
  23.         "\n'Continue' to intall the program anyway, or select"
  24.         "\n'Abort' to end the installation."))
  25.  
  26. (set #hello-message
  27.    (cat "Welcome to the SysInspector Installation Utility."
  28.         "\n\nThis product is © 1997 by Eric Sauvageau."
  29.         "\n\nPlease support Amiga shareware authors with your contribution."))
  30.  
  31. (set #SI-dest
  32.    (cat "Where would you like SysInspector program to be"
  33.         "\ninstalled?  A directory will NOT be created during"
  34.         "\nthe installation."))
  35.  
  36. (set #AR-dest
  37.    (cat "Where do you want to copy the ARexx scripts?"
  38.         "\nThe default directory is REXX:."))
  39.  
  40. (set #DC-dest
  41.    (cat "Where would you like SysInspector documentation to be"
  42.         "\ninstalled?  The default directory is Help:.  You may"
  43.         "\nselect a different destination if you wish."))
  44.  
  45. (set #BL-dest
  46.    (cat "Where would you like the boards.library to be"
  47.         "\ninstalled?  The default directory is LIBS:, which"
  48.         "\nshould be appropriate for most users."))
  49.  
  50. (set #Install-Complete
  51.    (cat "\n\nPlease read the documentation carefully to get"
  52.         "\nthe most out of SysInspector.  SysInspector is a"
  53.         "\npowerful and useful tool, but be sure you know"
  54.         "\nhow to use it to prevent loss of data."))
  55.  
  56. (set #wrongversion
  57. (cat "You have an old version of the program 'Installer' "
  58.      "on your Amiga!\n\nThe installation procedure needs at least Installer 42.9.\n\n"
  59.      "Please check your configuration!"
  60. ))
  61.  
  62. (welcome #hello-message)
  63.  
  64.  
  65. ; ------------------------------
  66. ; Check Installer & Kickstart Version
  67. ; ------------------------------
  68.  
  69. (if (< @installer-version 2752521)
  70.   (
  71.     (message #wrongversion)
  72.     (exit (quiet))
  73.   )
  74. )
  75.  
  76. (if (< (getversion) (* 39 65536))
  77.         (abort #bad-kick)
  78. )
  79.  
  80. ; ------------------------------
  81. ; Check if ClassAct 2.0 installed
  82. ; ------------------------------
  83.  
  84. (if (< (getversion "libs:window.class") (* 42 65536))
  85.    (set ContInstall
  86.              (askbool
  87.                 (prompt #no-classact)
  88.                 (help #Help-ContInstall)
  89.                 (default 0)
  90.                 (choices "Continue Installation" "Abort Installation")
  91.              )
  92.    )
  93. )
  94.  
  95. (if (= ContInstall 1)
  96.         (abort "\nInstallation Aborted!")
  97. )
  98.  
  99. ; ------------------------------
  100. ; Get destinations
  101. ; ------------------------------
  102.  
  103. (set destdir-SI
  104.    (askdir
  105.          (prompt #SI-dest)
  106.          (help @askdir-help)
  107.          (default "Sys:Utilities")
  108.    )
  109. )
  110.  
  111. (set destdir-DC
  112.    (askdir
  113.          (prompt #DC-dest)
  114.          (help @askdir-help)
  115.          (default "Help:")
  116.    )
  117. )
  118.  
  119. (set destdir-BL
  120.    (askdir
  121.          (prompt #BL-dest)
  122.          (help @askdir-help)
  123.          (default "Libs:")
  124.    )
  125. )
  126.  
  127. (set destdir-AR
  128.    (askdir
  129.          (prompt #AR-dest)
  130.          (help @askdir-help)
  131.          (default "REXX:")
  132.    )
  133. )
  134.  
  135.  
  136. ; ------------------------------
  137. ; Installation
  138. ; ------------------------------
  139.  
  140. (copyfiles
  141.    (source "SysInspector")
  142.    (dest destdir-SI)
  143.    (infos)
  144. )
  145.  
  146. (copyfiles
  147.    (source "ARexx/")
  148.    (dest destdir-AR)
  149.    (infos)
  150.    (all)
  151. )
  152.  
  153. (copyfiles
  154.    (source "SysInspector.guide")
  155.    (dest destdir-DC)
  156.    (infos)
  157. )
  158.  
  159.  
  160. (copylib
  161.    (source "libs/boards.library")
  162.    (dest destdir-BL)
  163. )
  164.  
  165.  
  166. ; ------------------------------
  167. ; Finishing up
  168. ; ------------------------------
  169.  
  170. (run "C:run >NIL: sys:utilities/multiview CHANGES")
  171. (message #Install-Complete)
  172. (exit)
  173.